Lavoro di gruppo Pertini

per accompagna.con :musica
as "nome.completo (parola :musica ".wav)
suoni mci.play2 :nome.completo
fine

per suono.chiudi
mci.chiudi
fine

per suoni
QQ.iplozero
CC "wav
fine

suono.chiudi
accompagna.con "guerrestellari

PER PUNTONE :DIM :COL
SPESSORE :DIM
ASCOLPENNA :COL
SCRIPUNTO DOVE
FINE

TA
aspetta 3000
SFONDOBLU1
aspetta 4000

COMINCIAXY 200 200
PUNTONE 200 :GIALLO1
ASPETTA 4000

SALTAX -150
SALTAY -150
PUNTONE 30 :MARRONE
ASPETTA 4000

SALTAX -80
SALTAY -40
PUNTONE 50 :ARANCIONE
ASPETTA 4000

SALTAX -60
SALTAY -120
PUNTONE 40 :AZZURRO
ASPETTA 4000

SALTAX -100
SALTAY -100
PUNTONE 40 :ROSSO1
aspetta 4000

suono.chiudi

SFONDO.CONSERVA.COME "PIANETI